home *** CD-ROM | disk | FTP | other *** search
/ Aminet 6 / Aminet 6 - June 1995.iso / Aminet / misc / amag / AM95047.lha / p4 / src.lha / src / Init.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-04-20  |  603 b   |  36 lines

  1. #include <exec/types.h>
  2. #include <exec/memory.h>
  3. #include <proto/exec.h>
  4.  
  5. #include <stdlib.h>
  6. #include <time.h>
  7. #include "protos.h"
  8. #include "main.h"
  9.  
  10. extern ptrtab terrain;
  11. extern UBYTE ListeCoup[XMAX*YMAX+1];
  12.  
  13. void Clear(ptrtab pipo)
  14. {
  15.  UBYTE i,j;
  16.  
  17.  for(i=0;i<XMAX+2*GAGNE;i++)
  18.  {
  19.   for(j=0;j<YMAX+2*GAGNE;j++)
  20.    if((i>=GAGNE)&&(i<XMAX+GAGNE)&&(j>=GAGNE)&&(j<YMAX+GAGNE))
  21.    {
  22.     pipo->jeu[i][j]=RIEN;
  23.     pipo->colonnes[i]=GAGNE;
  24.    }
  25.    else
  26.     pipo->jeu[i][j]=IMPOSSIBLE;
  27.  }
  28. }
  29.  
  30. void Init(void)
  31. {
  32.  terrain=(ptrtab)AllocVec(sizeof(tab),MEMF_PUBLIC);
  33.  ListeCoup[0]=1;
  34.  srand((ULONG)time(NULL));
  35. }
  36.